-- card: 3770 from stack: in
-- bmap block id: 21334
-- flags: 4000
-- background id: 2605
-- name: conclusion
----- HyperTalk script -----
on closeCard
  hide cd btn "cloister"
  repeat with i = 2 to 4
    if visible of cd fld i is true
    then
    click at 60,300
    exit repeat
  end if
end repeat
if visible of cd fld "madonna" is true then
  lock screen
  hide cd fld "madonna"
  unlock screen with dissolve
end if
pass closeCard
end closeCard


-- part 2 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=254 top=26 right=316 bottom=488
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  if visible of cd fld "madonna" is false and icon of cd btn id 5 is not 6102 then
    Click at 60,300
    wait 30
  end if
  popup "madonna"
end mouseUp



-- part 3 (field)
-- low flags: 81
-- high flags: 2004
-- rect: left=259 top=202 right=309 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: madonna


-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=54 top=275 right=314 bottom=95
-- title width / last selected line: 0
-- icon id / first selected line: 6102 / 6102
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  global ThisOne
  cleanScreen
  if visible of cd fld "madonna" is true then
    lock screen
    hide cd fld "madonna"
    unlock screen with dissolve
  end if
  put (item 1 of clickLoc()) - (item 1 of the rect of me) into A
  put (item 1 of clickLoc()) - (item 3 of the rect of me) into B
  put (item 2 of the rect of me) - (item 2 of clickLoc()) into C
  put (item 4 of the rect of me) - (item 2 of clickLoc()) into D
  put (item 1 of clickLoc()) - (item 1 of loc of me) into E
  put (item 2 of clickLoc()) - (item 2 of loc of me) into F
  play "Switch" fe
  if (A < abs(B)) then
    if (abs(C) < D) then
      showhidefld1 6103,2
    else if (abs(C) > D) then
      showhidefld1 6102,0
    end if
  end if
  if (A > abs(B)) then
    if (abs(C) < D) then
      showhidefld1 6100,3
    else if (abs(C) > D) then
      showhidefld1 6101,4
    end if
  end if
end mouseUp

on showhidefld1 IconNo,ThisOne
  set icon of target to IconNo
  lock screen
  repeat with i = 2 to 4
    hide cd fld i
  end repeat
  if ThisOne is not "0" then
    show cd fld ThisOne
  else
  end if
  unlock screen
end showhidefld1


-- part 6 (field)
-- low flags: 81
-- high flags: 2004
-- rect: left=75 top=47 right=267 bottom=246
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 14
-- part name: DoNotPop


-- part 7 (field)
-- low flags: 81
-- high flags: 2004
-- rect: left=75 top=84 right=256 bottom=251
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 14
-- part name: DoNotPop


-- part 8 (field)
-- low flags: 81
-- high flags: 2004
-- rect: left=72 top=24 right=269 bottom=342
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 14
-- part name: DoNotPop


-- part 10 (button)
-- low flags: 80
-- high flags: A000
-- rect: left=195 top=269 right=316 bottom=250
-- title width / last selected line: 0
-- icon id / first selected line: 22873 / 22873
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Cloister
----- HyperTalk script -----
on mouseUp
  visual zoom in
  go stack "Imitatio Christi"
  if result() is empty then
  else
    beep
  end if
end mouseUp


-- part contents for card part 3
----- text -----
Retouched detail from Madonna painted perhaps as early as 4th century A.D. and discovered during the cleaning of a much repainted panel found in Rome.  It may be the oldest surviving painting 
(not counting murals).  The original suggests a deeper, richer version of the faces Modigliani would paint 1500 years later.

-- part contents for card part 6
----- text -----
When all the functions performed by the brain as we understand it have been stilled, what remains?  Not, as one might suppose, nothing at all, but an amazing sense of diety, to which mystics of all ages bear witness.
 
 -G. Taylor,  
THE NATURAL HISTORY OF THE MIND


-- part contents for card part 7
----- text -----
Why level downwards to our dullest perceptions always, and praise that as common sense?  The commonest sense is the sense of men asleep, which they express by snoring....

-Henry David Thoreau






-- part contents for card part 8
----- text -----
Mock on, Mock on, Voltaire, Rousseau;
Mock on, Mock on, 'tis all in vain, 
You throw the sand against the wind,
And the wind blows it back again.

And every sand becomes a Gem
Reflected in the beams divine;
Blown back, they blind the mocking Eye,
But still in Israel's paths they shine.

The Atoms of Democritus
And Newton's Particles of light
Are sands upon the Red sea shore, 
Where Israel's tents do shine so bright.

-William Blake, 1803